_require local "../../../basis.smi"
_require local "./TEST.sig"

structure Test =
struct
  type testFunction = unit -> unit
  datatype test =
      TestCase of testFunction
    | Test of string * testFunction
    | TestLabel of (string * test)
    | TestList of test list
  val labelTests : (string * testFunction) list -> test
end
